home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 4 / Mac Giga-ROM 4.0 - 1993.toast / FILES / BBS / MISC / WWIV_3.0-4 / stack script < prev    next >
MacBinary  |  1988-05-24  |  8.4 KB  |  [TEXT/EDIT]

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: MacBinary (archive/macBinary).

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Tue May 24 00:48:52 1988, modified Tue May 24 00:48:52 1988, creator Macintosh Edit, type ASCII, 7700 bytes "stack script" , at 0x1e94 608 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[EDIT]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 73 74 61 63 6b 20 | 73 63 72 69 70 74 00 00 |..stack |script..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 45 44 49 | 54 01 00 00 00 00 00 00 |.TEXTEDI|T.......|
|00000050| 00 00 00 00 00 1e 14 00 | 00 02 60 9e be b1 34 9e |........|..`...4.|
|00000060| be b1 34 00 00 06 00 00 | 00 00 00 00 00 00 00 00 |..4.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 fd 39 00 00 |........|.....9..|
|00000080| 2d 2d 20 73 65 74 20 74 | 68 65 20 62 61 75 64 20 |-- set t|he baud |
|00000090| 72 61 74 65 20 28 38 20 | 64 61 74 61 20 62 69 74 |rate (8 |data bit|
|000000a0| 73 2c 20 31 20 73 74 6f | 70 20 62 69 74 2c 20 6e |s, 1 sto|p bit, n|
|000000b0| 6f 20 70 61 72 69 74 79 | 20 29 0d 0d 6f 6e 20 73 |o parity| )..on s|
|000000c0| 65 74 42 61 75 64 20 72 | 61 74 65 0d 20 20 67 6c |etBaud r|ate. gl|
|000000d0| 6f 62 61 6c 20 63 6f 6d | 6e 75 6d 0d 20 20 69 66 |obal com|num. if|
|000000e0| 20 72 61 74 65 20 69 73 | 20 33 30 30 20 74 68 65 | rate is| 300 the|
|000000f0| 6e 20 72 65 73 65 74 53 | 50 6f 72 74 20 63 6f 6d |n resetS|Port com|
|00000100| 6e 75 6d 2c 33 38 30 2b | 31 36 33 38 34 2b 33 30 |num,380+|16384+30|
|00000110| 37 32 0d 20 20 65 6c 73 | 65 20 69 66 20 72 61 74 |72. els|e if rat|
|00000120| 65 20 69 73 20 31 32 30 | 30 20 74 68 65 6e 20 72 |e is 120|0 then r|
|00000130| 65 73 65 74 53 50 6f 72 | 74 20 63 6f 6d 6e 75 6d |esetSPor|t comnum|
|00000140| 2c 39 34 2b 31 36 33 38 | 34 2b 33 30 37 32 0d 20 |,94+1638|4+3072. |
|00000150| 20 65 6c 73 65 20 69 66 | 20 72 61 74 65 20 69 73 | else if| rate is|
|00000160| 20 32 34 30 30 20 74 68 | 65 6e 20 72 65 73 65 74 | 2400 th|en reset|
|00000170| 53 50 6f 72 74 20 63 6f | 6d 6e 75 6d 2c 34 36 2b |SPort co|mnum,46+|
|00000180| 31 36 33 38 34 2b 33 30 | 37 32 0d 20 20 65 6c 73 |16384+30|72. els|
|00000190| 65 20 69 66 20 72 61 74 | 65 20 69 73 20 34 38 30 |e if rat|e is 480|
|000001a0| 30 20 74 68 65 6e 20 72 | 65 73 65 74 53 50 6f 72 |0 then r|esetSPor|
|000001b0| 74 20 63 6f 6d 6e 75 6d | 2c 32 32 2b 31 36 33 38 |t comnum|,22+1638|
|000001c0| 34 2b 33 30 37 32 0d 20 | 20 65 6c 73 65 20 69 66 |4+3072. | else if|
|000001d0| 20 72 61 74 65 20 69 73 | 20 39 36 30 30 20 74 68 | rate is| 9600 th|
|000001e0| 65 6e 20 72 65 73 65 74 | 53 50 6f 72 74 20 63 6f |en reset|SPort co|
|000001f0| 6d 6e 75 6d 2c 31 30 2b | 31 36 33 38 34 2b 33 30 |mnum,10+|16384+30|
|00000200| 37 32 0d 20 20 65 6c 73 | 65 20 69 66 20 72 61 74 |72. els|e if rat|
|00000210| 65 20 69 73 20 31 39 32 | 30 30 20 74 68 65 6e 20 |e is 192|00 then |
|00000220| 72 65 73 65 74 53 50 6f | 72 74 20 63 6f 6d 6e 75 |resetSPo|rt comnu|
|00000230| 6d 2c 34 2b 31 36 33 38 | 34 2b 33 30 37 32 0d 65 |m,4+1638|4+3072.e|
|00000240| 6e 64 20 73 65 74 42 61 | 75 64 0d 0d 2d 2d 20 73 |nd setBa|ud..-- s|
|00000250| 65 6e 64 20 61 20 72 61 | 6e 64 6f 6d 20 71 75 6f |end a ra|ndom quo|
|00000260| 74 65 20 74 6f 20 74 68 | 65 20 73 65 72 69 61 6c |te to th|e serial|
|00000270| 20 70 6f 72 74 0d 0d 6f | 6e 20 64 6f 51 75 6f 74 | port..o|n doQuot|
|00000280| 65 0d 20 20 67 6c 6f 62 | 61 6c 20 63 6f 6d 6e 75 |e. glob|al comnu|
|00000290| 6d 2c 6c 73 70 64 0d 20 | 20 67 6f 20 74 6f 20 61 |m,lspd. | go to a|
|000002a0| 6e 79 20 63 61 72 64 20 | 2d 2d 20 6a 75 73 74 20 |ny card |-- just |
|000002b0| 68 6f 70 65 20 74 68 61 | 74 20 69 74 20 64 6f 65 |hope tha|t it doe|
|000002c0| 73 6e 27 74 20 67 65 74 | 20 66 69 72 73 74 20 63 |sn't get| first c|
|000002d0| 61 72 64 20 61 74 20 70 | 72 65 73 65 6e 74 0d 20 |ard at p|resent. |
|000002e0| 20 70 75 74 20 31 20 69 | 6e 74 6f 20 6c 69 6e 65 | put 1 i|nto line|
|000002f0| 6e 75 6d 0d 20 20 70 75 | 74 20 74 68 65 20 6e 75 |num. pu|t the nu|
|00000300| 6d 62 65 72 20 6f 66 20 | 6c 69 6e 65 73 20 69 6e |mber of |lines in|
|00000310| 20 63 61 72 64 20 66 69 | 65 6c 64 20 31 20 69 6e | card fi|eld 1 in|
|00000320| 74 6f 20 6e 75 6d 6c 69 | 6e 65 73 0d 20 20 72 65 |to numli|nes. re|
|00000330| 70 65 61 74 20 66 6f 72 | 20 6e 75 6d 6c 69 6e 65 |peat for| numline|
|00000340| 73 0d 20 20 20 20 67 65 | 74 20 6c 69 6e 65 20 6c |s. ge|t line l|
|00000350| 69 6e 65 6e 75 6d 20 6f | 66 20 63 61 72 64 20 66 |inenum o|f card f|
|00000360| 69 65 6c 64 20 31 0d 20 | 20 20 20 69 66 20 6c 73 |ield 1. | if ls|
|00000370| 70 64 20 3c 3e 20 22 4b | 42 22 20 74 68 65 6e 20 |pd <> "K|B" then |
|00000380| 73 65 6e 64 53 50 6f 72 | 74 20 63 6f 6d 6e 75 6d |sendSPor|t comnum|
|00000390| 2c 74 72 75 65 2c 69 74 | 20 26 20 72 65 74 75 72 |,true,it| & retur|
|000003a0| 6e 0d 20 20 20 20 70 75 | 74 20 69 74 0d 20 20 20 |n. pu|t it. |
|000003b0| 20 61 64 64 20 31 20 74 | 6f 20 6c 69 6e 65 6e 75 | add 1 t|o linenu|
|000003c0| 6d 0d 20 20 65 6e 64 20 | 72 65 70 65 61 74 0d 65 |m. end |repeat.e|
|000003d0| 6e 64 20 64 6f 51 75 6f | 74 65 0d 0d 6f 6e 20 47 |nd doQuo|te..on G|
|000003e0| 65 74 53 74 61 72 74 75 | 70 53 74 75 66 66 0d 20 |etStartu|pStuff. |
|000003f0| 20 67 6c 6f 62 61 6c 20 | 63 6f 6d 70 74 79 70 0d | global |comptyp.|
|00000400| 20 20 0d 20 20 2d 2d 20 | 4c 61 75 6e 63 68 20 64 | . -- |Launch d|
|00000410| 61 74 61 20 66 69 6c 65 | 20 76 61 72 69 61 62 6c |ata file| variabl|
|00000420| 65 73 0d 20 20 67 6c 6f | 62 61 6c 20 6c 73 75 62 |es. glo|bal lsub|
|00000430| 6c 61 75 6e 63 68 2c c2 | 0d 20 20 6c 72 65 74 75 |launch,.|. lretu|
|00000440| 72 6e 70 72 6f 67 2c c2 | 0d 20 20 6c 75 73 65 72 |rnprog,.|. luser|
|00000450| 6f 6e 2c c2 0d 20 20 6c | 69 6e 63 6f 6d 2c c2 0d |on,.. l|incom,..|
|00000460| 20 20 6c 6f 75 74 63 6f | 6d 2c c2 0d 20 20 6c 73 | loutco|m,.. ls|
|00000470| 70 64 2c c2 0d 20 20 6c | 68 61 6e 67 75 70 2c c2 |pd,.. l|hangup,.|
|00000480| 0d 20 20 6c 75 73 65 72 | 6e 75 6d 0d 20 20 0d 20 |. luser|num. . |
|00000490| 20 67 6c 6f 62 61 6c 20 | 6c 74 68 69 73 75 73 65 | global |lthisuse|
|000004a0| 72 5f 6e 61 6d 65 2c c2 | 0d 20 20 6c 74 68 69 73 |r_name,.|. lthis|
|000004b0| 75 73 65 72 5f 72 65 61 | 6c 6e 61 6d 65 2c c2 0d |user_rea|lname,..|
|000004c0| 20 20 6c 74 68 69 73 75 | 73 65 72 5f 64 65 6c 65 | lthisu|ser_dele|
|000004d0| 74 65 64 2c c2 0d 20 20 | 6c 74 68 69 73 75 73 65 |ted,.. |lthisuse|
|000004e0| 72 5f 70 77 2c c2 0d 20 | 20 6c 74 68 69 73 75 73 |r_pw,.. | lthisus|
|000004f0| 65 72 5f 70 68 2c c2 0d | 20 20 6c 74 68 69 73 75 |er_ph,..| lthisu|
|00000500| 73 65 72 5f 77 61 69 74 | 69 6e 67 2c c2 0d 20 20 |ser_wait|ing,.. |
|00000510| 6c 74 68 69 73 75 73 65 | 72 5f 6c 61 73 74 6f 6e |lthisuse|r_laston|
|00000520| 2c c2 0d 20 20 6c 74 68 | 69 73 75 73 65 72 5f 6c |,.. lth|isuser_l|
|00000530| 6f 67 67 65 64 6f 6e 2c | c2 0d 20 20 6c 74 68 69 |oggedon,|.. lthi|
|00000540| 73 75 73 65 72 5f 6d 73 | 67 70 6f 73 74 2c c2 0d |suser_ms|gpost,..|
|00000550| 20 20 6c 74 68 69 73 75 | 73 65 72 5f 65 6d 61 69 | lthisu|ser_emai|
|00000560| 6c 73 65 6e 74 2c c2 0d | 20 20 6c 74 68 69 73 75 |lsent,..| lthisu|
|00000570| 73 65 72 5f 66 65 65 64 | 62 61 63 6b 2c c2 0d 20 |ser_feed|back,.. |
|00000580| 20 6c 74 68 69 73 75 73 | 65 72 5f 6c 69 6e 65 6c | lthisus|er_linel|
|00000590| 65 6e 2c c2 0d 20 20 6c | 74 68 69 73 75 73 65 72 |en,.. l|thisuser|
|000005a0| 5f 70 61 67 65 6c 65 6e | 2c c2 0d 20 20 6c 74 68 |_pagelen|,.. lth|
|000005b0| 69 73 75 73 65 72 5f 64 | 65 66 61 75 6c 74 73 2c |isuser_d|efaults,|
|000005c0| c2 0d 20 20 6c 74 68 69 | 73 75 73 65 72 5f 6f 6e |.. lthi|suser_on|
|000005d0| 74 6f 64 61 79 2c c2 0d | 20 20 6c 74 68 69 73 75 |today,..| lthisu|
|000005e0| 73 65 72 5f 69 6c 6c 65 | 67 61 6c 2c c2 0d 20 20 |ser_ille|gal,.. |
|000005f0| 6c 74 68 69 73 75 73 65 | 72 5f 63 75 72 73 6f 72 |lthisuse|r_cursor|
|00000600| 2c c2 0d 20 20 6c 74 68 | 69 73 75 73 65 72 5f 73 |,.. lth|isuser_s|
|00000610| 6c 2c c2 0d 20 20 6c 74 | 68 69 73 75 73 65 72 5f |l,.. lt|hisuser_|
|00000620| 61 63 2c c2 0d 20 20 6c | 74 68 69 73 75 73 65 72 |ac,.. l|thisuser|
|00000630| 5f 61 72 2c c2 0d 20 20 | 6c 74 68 69 73 75 73 65 |_ar,.. |lthisuse|
|00000640| 72 5f 71 73 63 61 6e 5f | 6c 74 72 2c c2 0d 20 20 |r_qscan_|ltr,.. |
|00000650| 6c 74 68 69 73 75 73 65 | 72 5f 71 73 63 61 6e 5f |lthisuse|r_qscan_|
|00000660| 6e 75 6d 62 65 72 2c c2 | 0d 20 20 6c 74 68 69 73 |number,.|. lthis|
|00000670| 75 73 65 72 5f 71 73 63 | 61 6e 5f 65 78 74 2c c2 |user_qsc|an_ext,.|
|00000680| 0d 20 20 6c 74 68 69 73 | 75 73 65 72 5f 71 73 63 |. lthis|user_qsc|
|00000690| 6e 2c c2 0d 20 20 6c 74 | 68 69 73 75 73 65 72 5f |n,.. lt|hisuser_|
|000006a0| 6d 61 63 72 6f 31 2c c2 | 0d 20 20 6c 74 68 69 73 |macro1,.|. lthis|
|000006b0| 75 73 65 72 5f 6d 61 63 | 72 6f 32 2c c2 0d 20 20 |user_mac|ro2,.. |
|000006c0| 6c 74 68 69 73 75 73 65 | 72 5f 63 6f 6d 70 74 79 |lthisuse|r_compty|
|000006d0| 70 65 2c c2 0d 20 20 6c | 74 68 69 73 75 73 65 72 |pe,.. l|thisuser|
|000006e0| 5f 6f 70 74 69 6f 6e 2c | c2 0d 20 20 6c 74 68 69 |_option,|.. lthi|
|000006f0| 73 75 73 65 72 5f 76 6f | 74 65 2c c2 0d 20 20 6c |suser_vo|te,.. l|
|00000700| 74 68 69 73 75 73 65 72 | 5f 73 62 6e 2c c2 0d 20 |thisuser|_sbn,.. |
|00000710| 20 6c 74 68 69 73 75 73 | 65 72 5f 64 73 6c 2c c2 | lthisus|er_dsl,.|
|00000720| 0d 20 20 6c 74 68 69 73 | 75 73 65 72 5f 75 70 6c |. lthis|user_upl|
|00000730| 6f 61 64 73 2c c2 0d 20 | 20 6c 74 68 69 73 75 73 |oads,.. | lthisus|
|00000740| 65 72 5f 64 6f 77 6e 6c | 6f 61 64 73 2c c2 0d 20 |er_downl|oads,.. |
|00000750| 20 6c 74 68 69 73 75 73 | 65 72 5f 75 6b 2c c2 0d | lthisus|er_uk,..|
|00000760| 20 20 6c 74 68 69 73 75 | 73 65 72 5f 64 6b 0d 20 | lthisu|ser_dk. |
|00000770| 20 0d 20 20 67 6c 6f 62 | 61 6c 20 6c 72 65 61 6c | . glob|al lreal|
|00000780| 73 6c 2c c2 0d 20 20 6c | 74 69 6d 65 6f 6e 2c c2 |sl,.. l|timeon,.|
|00000790| 0d 20 20 6c 65 78 74 72 | 61 74 69 6d 65 2c c2 0d |. lextr|atime,..|
|000007a0| 20 20 6c 74 74 69 6d 65 | 2c c2 0d 20 20 6c 63 68 | lttime|,.. lch|
|000007b0| 61 74 74 69 6d 65 0d 20 | 20 0d 20 20 67 6c 6f 62 |attime. | . glob|
|000007c0| 61 6c 20 6c 73 79 73 74 | 61 74 5f 62 6f 61 72 64 |al lsyst|at_board|
|000007d0| 70 77 2c c2 0d 20 20 6c | 73 79 73 74 61 74 5f 73 |pw,.. l|systat_s|
|000007e0| 79 73 6f 70 70 77 2c c2 | 0d 20 20 6c 73 79 73 74 |ysoppw,.|. lsyst|
|000007f0| 61 74 5f 68 6d 73 67 5f | 6c 74 72 2c c2 0d 20 20 |at_hmsg_|ltr,.. |
|00000800| 6c 73 79 73 74 61 74 5f | 68 6d 73 67 5f 6e 75 6d |lsystat_|hmsg_num|
|00000810| 62 65 72 2c c2 0d 20 20 | 6c 73 79 73 74 61 74 5f |ber,.. |lsystat_|
|00000820| 68 6d 73 67 5f 65 78 74 | 2c c2 0d 20 20 6c 73 79 |hmsg_ext|,.. lsy|
|00000830| 73 74 61 74 5f 75 73 65 | 72 73 2c c2 0d 20 20 6c |stat_use|rs,.. l|
|00000840| 73 79 73 74 61 74 5f 6c | 61 73 74 64 61 74 65 2c |systat_l|astdate,|
|00000850| c2 0d 20 20 6c 73 79 73 | 74 61 74 5f 63 61 6c 6c |.. lsys|tat_call|
|00000860| 65 72 6e 75 6d 2c c2 0d | 20 20 6c 73 79 73 74 61 |ernum,..| lsysta|
|00000870| 74 5f 61 63 74 69 76 65 | 74 6f 64 61 79 2c c2 0d |t_active|today,..|
|00000880| 20 20 6c 73 79 73 74 61 | 74 5f 63 61 6c 6c 73 74 | lsysta|t_callst|
|00000890| 6f 64 61 79 2c c2 0d 20 | 20 6c 73 79 73 74 61 74 |oday,.. | lsystat|
|000008a0| 5f 6d 73 67 70 6f 73 74 | 74 6f 64 61 79 2c c2 0d |_msgpost|today,..|
|000008b0| 20 20 6c 73 79 73 74 61 | 74 5f 65 6d 61 69 6c 74 | lsysta|t_emailt|
|000008c0| 6f 64 61 79 2c c2 0d 20 | 20 6c 73 79 73 74 61 74 |oday,.. | lsystat|
|000008d0| 5f 66 62 61 63 6b 74 6f | 64 61 79 2c c2 0d 20 20 |_fbackto|day,.. |
|000008e0| 6c 73 79 73 74 61 74 5f | 75 70 74 6f 64 61 79 2c |lsystat_|uptoday,|
|000008f0| c2 0d 20 20 6c 73 79 73 | 74 61 74 5f 63 6c 6f 73 |.. lsys|tat_clos|
|00000900| 65 64 73 79 73 74 65 6d | 0d 20 20 0d 20 20 67 6c |edsystem|. . gl|
|00000910| 6f 62 61 6c 20 6c 73 79 | 73 6f 70 61 76 61 69 6c |obal lsy|sopavail|
|00000920| 2c c2 0d 20 20 6c 65 78 | 74 72 61 6d 73 67 73 2c |,.. lex|tramsgs,|
|00000930| c2 0d 20 20 6c 63 68 61 | 74 63 61 6c 6c 2c c2 0d |.. lcha|tcall,..|
|00000940| 20 20 6c 63 68 61 74 72 | 2c c2 0d 20 20 6c 65 78 | lchatr|,.. lex|
|00000950| 70 65 72 74 2c c2 0d 20 | 20 6c 66 74 6f 64 61 79 |pert,.. | lftoday|
|00000960| 2c c2 0d 20 20 6c 65 74 | 6f 64 61 79 2c c2 0d 20 |,.. let|oday,.. |
|00000970| 20 6c 6d 72 65 61 64 2c | c2 0d 20 20 6c 70 74 6f | lmread,|.. lpto|
|00000980| 64 61 79 0d 20 20 0d 20 | 20 2d 2d 20 42 42 53 20 |day. . | -- BBS |
|00000990| 73 74 72 69 6e 67 20 72 | 65 73 6f 75 72 63 65 73 |string r|esources|
|000009a0| 20 28 20 73 6f 6d 65 20 | 6f 66 20 74 68 65 6d 20 | ( some |of them |
|000009b0| 29 0d 20 20 67 6c 6f 62 | 61 6c 20 63 6f 6d 6e 75 |). glob|al comnu|
|000009c0| 6d 2c c2 0d 20 20 6d 61 | 78 62 61 75 64 2c c2 0d |m,.. ma|xbaud,..|
|000009d0| 20 20 4d 69 6e 42 61 75 | 64 2c c2 0d 20 20 6d 6f | MinBau|d,.. mo|
|000009e0| 64 65 6d 69 6e 69 74 2c | c2 0d 20 20 6d 6f 64 65 |deminit,|.. mode|
|000009f0| 6d 65 73 63 2c c2 0d 20 | 20 67 66 69 6c 65 73 70 |mesc,.. | gfilesp|
|00000a00| 61 74 68 2c c2 0d 20 20 | 70 61 74 68 64 6c 6f 61 |ath,.. |pathdloa|
|00000a10| 64 73 2c c2 0d 20 20 70 | 61 74 68 6d 73 67 73 2c |ds,.. p|athmsgs,|
|00000a20| c2 0d 20 20 6d 73 67 73 | 70 61 74 68 5f 30 2c 6d |.. msgs|path_0,m|
|00000a30| 73 67 73 70 61 74 68 5f | 31 2c 6d 73 67 73 70 61 |sgspath_|1,msgspa|
|00000a40| 74 68 5f 32 2c 6d 73 67 | 73 70 61 74 68 5f 33 2c |th_2,msg|spath_3,|
|00000a50| 6d 73 67 73 70 61 74 68 | 5f 34 2c 6d 73 67 73 70 |msgspath|_4,msgsp|
|00000a60| 61 74 68 5f 35 2c c2 0d | 20 20 6d 73 67 73 70 61 |ath_5,..| msgspa|
|00000a70| 74 68 5f 36 2c 6d 73 67 | 73 70 61 74 68 5f 37 2c |th_6,msg|spath_7,|
|00000a80| 6d 73 67 73 70 61 74 68 | 5f 38 2c 6d 73 67 73 70 |msgspath|_8,msgsp|
|00000a90| 61 74 68 5f 39 2c 6d 73 | 67 73 70 61 74 68 5f 31 |ath_9,ms|gspath_1|
|00000aa0| 30 2c 6d 73 67 73 70 61 | 74 68 5f 31 31 2c c2 0d |0,msgspa|th_11,..|
|00000ab0| 20 20 6d 73 67 73 70 61 | 74 68 5f 31 32 2c 6d 73 | msgspa|th_12,ms|
|00000ac0| 67 73 70 61 74 68 5f 31 | 33 2c 6d 73 67 73 70 61 |gspath_1|3,msgspa|
|00000ad0| 74 68 5f 31 34 2c 6d 73 | 67 73 70 61 74 68 5f 31 |th_14,ms|gspath_1|
|00000ae0| 35 2c 6d 73 67 73 70 61 | 74 68 5f 31 36 2c c2 0d |5,msgspa|th_16,..|
|00000af0| 20 20 6d 73 67 73 70 61 | 74 68 5f 31 37 2c 6d 73 | msgspa|th_17,ms|
|00000b00| 67 73 70 61 74 68 5f 31 | 38 2c 6d 73 67 73 70 61 |gspath_1|8,msgspa|
|00000b10| 74 68 5f 31 39 2c c2 0d | 20 20 64 6c 6f 61 64 73 |th_19,..| dloads|
|00000b20| 70 61 74 68 5f 30 2c 64 | 6c 6f 61 64 73 70 61 74 |path_0,d|loadspat|
|00000b30| 68 5f 31 2c 64 6c 6f 61 | 64 73 70 61 74 68 5f 32 |h_1,dloa|dspath_2|
|00000b40| 2c 64 6c 6f 61 64 73 70 | 61 74 68 5f 33 2c 64 6c |,dloadsp|ath_3,dl|
|00000b50| 6f 61 64 73 70 61 74 68 | 5f 34 2c c2 0d 20 20 64 |oadspath|_4,.. d|
|00000b60| 6c 6f 61 64 73 70 61 74 | 68 5f 35 2c 64 6c 6f 61 |loadspat|h_5,dloa|
|00000b70| 64 73 70 61 74 68 5f 36 | 2c 64 6c 6f 61 64 73 70 |dspath_6|,dloadsp|
|00000b80| 61 74 68 5f 37 2c 64 6c | 6f 61 64 73 70 61 74 68 |ath_7,dl|oadspath|
|00000b90| 5f 38 2c 64 6c 6f 61 64 | 73 70 61 74 68 5f 39 2c |_8,dload|spath_9,|
|00000ba0| c2 0d 20 20 64 6c 6f 61 | 64 73 70 61 74 68 5f 31 |.. dloa|dspath_1|
|00000bb0| 30 2c 64 6c 6f 61 64 73 | 70 61 74 68 5f 31 31 2c |0,dloads|path_11,|
|00000bc0| 64 6c 6f 61 64 73 70 61 | 74 68 5f 31 32 2c 64 6c |dloadspa|th_12,dl|
|00000bd0| 6f 61 64 73 70 61 74 68 | 5f 31 33 2c c2 0d 20 20 |oadspath|_13,.. |
|00000be0| 64 6c 6f 61 64 73 70 61 | 74 68 5f 31 34 2c 64 6c |dloadspa|th_14,dl|
|00000bf0| 6f 61 64 73 70 61 74 68 | 5f 31 35 2c 64 6c 6f 61 |oadspath|_15,dloa|
|00000c00| 64 73 70 61 74 68 5f 31 | 36 2c 64 6c 6f 61 64 73 |dspath_1|6,dloads|
|00000c10| 70 61 74 68 5f 31 37 2c | c2 0d 20 20 64 6c 6f 61 |path_17,|.. dloa|
|00000c20| 64 73 70 61 74 68 5f 31 | 38 2c 64 6c 6f 61 64 73 |dspath_1|8,dloads|
|00000c30| 70 61 74 68 5f 31 39 0d | 20 20 0d 20 20 2d 2d 20 |path_19.| . -- |
|00000c40| 73 65 72 69 61 6c 20 70 | 6f 72 74 20 62 75 66 66 |serial p|ort buff|
|00000c50| 65 72 0d 20 20 67 6c 6f | 62 61 6c 20 74 68 65 42 |er. glo|bal theB|
|00000c60| 75 66 66 65 72 2c 69 6e | 69 74 65 64 5f 62 75 66 |uffer,in|ited_buf|
|00000c70| 66 65 72 2c 72 65 61 6c | 63 6f 6d 6e 75 6d 0d 20 |fer,real|comnum. |
|00000c80| 20 0d 20 20 67 6c 6f 62 | 61 6c 20 62 62 73 70 61 | . glob|al bbspa|
|00000c90| 74 68 0d 20 20 0d 20 20 | 73 68 6f 77 20 6d 65 73 |th. . |show mes|
|00000ca0| 73 61 67 65 20 62 6f 78 | 0d 20 20 0d 20 20 2d 2d |sage box|. . --|
|00000cb0| 20 68 61 76 65 20 74 6f | 20 68 61 72 64 20 63 6f | have to| hard co|
|00000cc0| 64 65 20 74 68 69 73 20 | 70 61 74 68 6e 61 6d 65 |de this |pathname|
|00000cd0| 20 61 74 20 70 72 65 73 | 65 6e 74 20 28 69 66 20 | at pres|ent (if |
|00000ce0| 6e 6f 74 20 73 75 62 2d | 6c 61 75 6e 63 68 69 6e |not sub-|launchin|
|00000cf0| 67 29 0d 20 20 70 75 74 | 20 22 48 61 72 64 20 44 |g). put| "Hard D|
|00000d00| 69 73 6b 3a 42 42 53 3a | 22 20 69 6e 74 6f 20 62 |isk:BBS:|" into b|
|00000d10| 62 73 70 61 74 68 0d 20 | 20 0d 20 20 47 65 74 4c |bspath. | . GetL|
|00000d20| 61 75 6e 63 68 53 74 75 | 66 66 0d 20 20 69 66 20 |aunchStu|ff. if |
|00000d30| 74 68 65 20 72 65 73 75 | 6c 74 20 69 73 20 74 72 |the resu|lt is tr|
|00000d40| 75 65 20 74 68 65 6e 0d | 20 20 20 20 70 75 74 20 |ue then.| put |
|00000d50| 22 6f 6b 22 20 69 6e 74 | 6f 20 6d 73 67 0d 20 20 |"ok" int|o msg. |
|00000d60| 20 20 0d 20 20 20 20 2d | 2d 20 48 79 70 65 72 54 | . -|- HyperT|
|00000d70| 65 72 6d 69 6e 61 6c 27 | 73 20 70 6f 72 74 20 6e |erminal'|s port n|
|00000d80| 6f 2e 20 69 73 20 6f 70 | 70 6f 73 69 74 65 20 6f |o. is op|posite o|
|00000d90| 66 20 42 42 53 27 73 2c | 20 73 6f 20 73 77 61 70 |f BBS's,| so swap|
|00000da0| 20 74 68 65 6d 0d 20 20 | 20 20 69 66 20 63 6f 6d | them. | if com|
|00000db0| 6e 75 6d 20 69 73 20 31 | 20 74 68 65 6e 0d 20 20 |num is 1| then. |
|00000dc0| 20 20 20 20 70 75 74 20 | 31 20 69 6e 74 6f 20 72 | put |1 into r|
|00000dd0| 65 61 6c 63 6f 6d 6e 75 | 6d 20 2d 2d 20 73 61 76 |ealcomnu|m -- sav|
|00000de0| 65 20 6f 75 72 73 20 66 | 6f 72 20 6c 61 74 65 72 |e ours f|or later|
|00000df0| 0d 20 20 20 20 20 20 70 | 75 74 20 32 20 69 6e 74 |. p|ut 2 int|
|00000e00| 6f 20 63 6f 6d 6e 75 6d | 0d 20 20 20 20 65 6c 73 |o comnum|. els|
|00000e10| 65 0d 20 20 20 20 20 20 | 70 75 74 20 32 20 69 6e |e. |put 2 in|
|00000e20| 74 6f 20 72 65 61 6c 63 | 6f 6d 6e 75 6d 20 2d 2d |to realc|omnum --|
|00000e30| 20 73 61 76 65 20 6f 75 | 72 73 20 66 6f 72 20 6c | save ou|rs for l|
|00000e40| 61 74 65 72 0d 20 20 20 | 20 20 20 70 75 74 20 31 |ater. | put 1|
|00000e50| 20 69 6e 74 6f 20 63 6f | 6d 6e 75 6d 0d 20 20 20 | into co|mnum. |
|00000e60| 20 65 6e 64 20 69 66 0d | 20 20 20 20 0d 20 20 20 | end if.| . |
|00000e70| 20 70 75 74 20 66 61 6c | 73 65 20 69 6e 74 6f 20 | put fal|se into |
|00000e80| 69 6e 69 74 65 64 5f 62 | 75 66 66 65 72 0d 20 20 |inited_b|uffer. |
|00000e90| 20 20 0d 20 20 20 20 69 | 66 20 6c 75 73 65 72 6f | . i|f lusero|
|00000ea0| 6e 20 69 73 20 74 72 75 | 65 20 74 68 65 6e 0d 20 |n is tru|e then. |
|00000eb0| 20 20 20 20 20 70 75 74 | 20 6c 73 70 64 20 69 6e | put| lspd in|
|00000ec0| 74 6f 20 74 65 6d 70 73 | 74 72 0d 20 20 20 20 20 |to temps|tr. |
|00000ed0| 20 69 66 20 6c 73 70 64 | 20 3c 3e 20 22 4b 42 22 | if lspd| <> "KB"|
|00000ee0| 20 74 68 65 6e 0d 20 20 | 20 20 20 20 20 20 70 75 | then. | pu|
|00000ef0| 74 20 6f 66 66 73 65 74 | 28 22 2f 22 2c 74 65 6d |t offset|("/",tem|
|00000f00| 70 73 74 72 29 20 69 6e | 74 6f 20 74 70 6f 73 0d |pstr) in|to tpos.|
|00000f10| 20 20 20 20 20 20 20 20 | 69 66 20 74 70 6f 73 20 | |if tpos |
|00000f20| 69 73 20 30 20 74 68 65 | 6e 20 70 75 74 20 28 74 |is 0 the|n put (t|
|00000f30| 68 65 20 6c 65 6e 67 74 | 68 20 6f 66 20 74 65 6d |he lengt|h of tem|
|00000f40| 70 73 74 72 29 2b 31 20 | 69 6e 74 6f 20 74 70 6f |pstr)+1 |into tpo|
|00000f50| 73 0d 20 20 20 20 20 20 | 20 20 70 75 74 20 73 70 |s. | put sp|
|00000f60| 61 63 65 20 61 66 74 65 | 72 20 63 68 61 72 20 74 |ace afte|r char t|
|00000f70| 70 6f 73 2d 31 20 6f 66 | 20 74 65 6d 70 73 74 72 |pos-1 of| tempstr|
|00000f80| 0d 20 20 20 20 20 20 20 | 20 70 75 74 20 66 69 72 |. | put fir|
|00000f90| 73 74 20 77 6f 72 64 20 | 6f 66 20 74 65 6d 70 73 |st word |of temps|
|00000fa0| 74 72 20 69 6e 74 6f 20 | 74 68 65 73 70 64 0d 20 |tr into |thespd. |
|00000fb0| 20 20 20 20 20 20 20 0d | 20 20 20 20 20 20 20 20 | .| |
|00000fc0| 6f 70 65 6e 53 50 6f 72 | 74 20 63 6f 6d 6e 75 6d |openSPor|t comnum|
|00000fd0| 0d 20 20 20 20 20 20 20 | 20 73 65 74 42 61 75 64 |. | setBaud|
|00000fe0| 20 74 68 65 73 70 64 0d | 20 20 20 20 20 20 65 6e | thespd.| en|
|00000ff0| 64 20 69 66 0d 20 20 20 | 20 65 6c 73 65 20 2d 2d |d if. | else --|
|00001000| 20 61 74 20 70 72 65 73 | 65 6e 74 20 28 6e 6f 74 | at pres|ent (not|
|00001010| 20 61 70 70 72 6f 70 72 | 69 61 74 65 20 66 6f 72 | appropr|iate for|
|00001020| 20 74 68 69 73 20 73 61 | 6d 70 6c 65 20 73 74 61 | this sa|mple sta|
|00001030| 63 6b 29 0d 20 20 20 20 | 20 20 6f 70 65 6e 53 50 |ck). | openSP|
|00001040| 6f 72 74 20 63 6f 6d 6e | 75 6d 0d 20 20 20 20 20 |ort comn|um. |
|00001050| 20 73 65 74 42 61 75 64 | 20 6d 61 78 62 61 75 64 | setBaud| maxbaud|
|00001060| 0d 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 |. end| if. |
|00001070| 0d 20 20 20 20 2d 2d 20 | 6f 6e 6c 79 20 6e 65 65 |. -- |only nee|
|00001080| 64 20 6e 65 78 74 20 32 | 20 6c 69 6e 65 73 20 69 |d next 2| lines i|
|00001090| 66 20 75 73 69 6e 67 20 | 73 65 72 69 61 6c 20 70 |f using |serial p|
|000010a0| 6f 72 74 20 69 6e 70 75 | 74 20 62 75 66 66 65 72 |ort inpu|t buffer|
|000010b0| 0d 20 20 20 20 2d 2d 20 | 70 75 74 20 62 75 66 66 |. -- |put buff|
|000010c0| 65 72 53 50 6f 72 74 28 | 63 6f 6d 6e 75 6d 2c 30 |erSPort(|comnum,0|
|000010d0| 2c 31 30 32 34 30 29 20 | 69 6e 74 6f 20 74 68 65 |,10240) |into the|
|000010e0| 42 75 66 66 65 72 0d 20 | 20 20 20 2d 2d 20 70 75 |Buffer. | -- pu|
|000010f0| 74 20 74 72 75 65 20 69 | 6e 74 6f 20 69 6e 69 74 |t true i|nto init|
|00001100| 65 64 5f 62 75 66 66 65 | 72 0d 20 20 20 20 0d 20 |ed_buffe|r. . |
|00001110| 20 20 20 64 6f 51 75 6f | 74 65 20 2d 2d 20 74 68 | doQuo|te -- th|
|00001120| 65 20 73 61 6d 70 6c 65 | 20 22 61 70 70 6c 69 63 |e sample| "applic|
|00001130| 61 74 69 6f 6e 22 0d 20 | 20 20 20 0d 20 20 20 20 |ation". | . |
|00001140| 67 6f 6f 64 62 79 65 20 | 2d 2d 20 65 78 69 74 20 |goodbye |-- exit |
|00001150| 74 6f 20 42 42 53 0d 20 | 20 20 20 0d 20 20 65 6c |to BBS. | . el|
|00001160| 73 65 0d 20 20 20 20 70 | 75 74 20 22 66 61 69 6c |se. p|ut "fail|
|00001170| 65 64 22 20 69 6e 74 6f | 20 6d 73 67 0d 20 20 65 |ed" into| msg. e|
|00001180| 6e 64 20 69 66 0d 20 20 | 0d 65 6e 64 20 47 65 74 |nd if. |.end Get|
|00001190| 53 74 61 72 74 75 70 53 | 74 75 66 66 0d 0d 6f 6e |StartupS|tuff..on|
|000011a0| 20 52 65 73 75 6d 65 0d | 20 20 47 65 74 53 74 61 | Resume.| GetSta|
|000011b0| 72 74 75 70 53 74 75 66 | 66 0d 65 6e 64 20 52 65 |rtupStuf|f.end Re|
|000011c0| 73 75 6d 65 0d 0d 6f 6e | 20 53 75 73 70 65 6e 64 |sume..on| Suspend|
|000011d0| 0d 65 6e 64 20 53 75 73 | 70 65 6e 64 0d 0d 6f 6e |.end Sus|pend..on|
|000011e0| 20 4f 70 65 6e 53 74 61 | 63 6b 0d 20 20 47 65 74 | OpenSta|ck. Get|
|000011f0| 53 74 61 72 74 75 70 53 | 74 75 66 66 0d 65 6e 64 |StartupS|tuff.end|
|00001200| 20 6f 70 65 6e 73 74 61 | 63 6b 0d 0d 2d 2d 20 6d | opensta|ck..-- m|
|00001210| 75 73 74 20 64 65 61 6c | 6c 6f 63 61 74 65 20 62 |ust deal|locate b|
|00001220| 75 66 66 65 72 20 65 74 | 63 0d 6f 6e 20 47 6f 6f |uffer et|c.on Goo|
|00001230| 64 42 79 65 0d 20 20 2d | 2d 20 4c 61 75 6e 63 68 |dBye. -|- Launch|
|00001240| 20 64 61 74 61 20 66 69 | 6c 65 20 76 61 72 69 61 | data fi|le varia|
|00001250| 62 6c 65 73 0d 20 20 67 | 6c 6f 62 61 6c 20 6c 73 |bles. g|lobal ls|
|00001260| 75 62 6c 61 75 6e 63 68 | 2c c2 0d 20 20 6c 72 65 |ublaunch|,.. lre|
|00001270| 74 75 72 6e 70 72 6f 67 | 2c c2 0d 20 20 6c 75 73 |turnprog|,.. lus|
|00001280| 65 72 6f 6e 2c c2 0d 20 | 20 6c 69 6e 63 6f 6d 2c |eron,.. | lincom,|
|00001290| c2 0d 20 20 6c 6f 75 74 | 63 6f 6d 2c c2 0d 20 20 |.. lout|com,.. |
|000012a0| 6c 73 70 64 2c c2 0d 20 | 20 6c 68 61 6e 67 75 70 |lspd,.. | lhangup|
|000012b0| 2c c2 0d 20 20 6c 75 73 | 65 72 6e 75 6d 0d 20 20 |,.. lus|ernum. |
|000012c0| 0d 20 20 67 6c 6f 62 61 | 6c 20 6c 74 68 69 73 75 |. globa|l lthisu|
|000012d0| 73 65 72 5f 6e 61 6d 65 | 2c c2 0d 20 20 6c 74 68 |ser_name|,.. lth|
|000012e0| 69 73 75 73 65 72 5f 72 | 65 61 6c 6e 61 6d 65 2c |isuser_r|ealname,|
|000012f0| c2 0d 20 20 6c 74 68 69 | 73 75 73 65 72 5f 64 65 |.. lthi|suser_de|
|00001300| 6c 65 74 65 64 2c c2 0d | 20 20 6c 74 68 69 73 75 |leted,..| lthisu|
|00001310| 73 65 72 5f 70 77 2c c2 | 0d 20 20 6c 74 68 69 73 |ser_pw,.|. lthis|
|00001320| 75 73 65 72 5f 70 68 2c | c2 0d 20 20 6c 74 68 69 |user_ph,|.. lthi|
|00001330| 73 75 73 65 72 5f 77 61 | 69 74 69 6e 67 2c c2 0d |suser_wa|iting,..|
|00001340| 20 20 6c 74 68 69 73 75 | 73 65 72 5f 6c 61 73 74 | lthisu|ser_last|
|00001350| 6f 6e 2c c2 0d 20 20 6c | 74 68 69 73 75 73 65 72 |on,.. l|thisuser|
|00001360| 5f 6c 6f 67 67 65 64 6f | 6e 2c c2 0d 20 20 6c 74 |_loggedo|n,.. lt|
|00001370| 68 69 73 75 73 65 72 5f | 6d 73 67 70 6f 73 74 2c |hisuser_|msgpost,|
|00001380| c2 0d 20 20 6c 74 68 69 | 73 75 73 65 72 5f 65 6d |.. lthi|suser_em|
|00001390| 61 69 6c 73 65 6e 74 2c | c2 0d 20 20 6c 74 68 69 |ailsent,|.. lthi|
|000013a0| 73 75 73 65 72 5f 66 65 | 65 64 62 61 63 6b 2c c2 |suser_fe|edback,.|
|000013b0| 0d 20 20 6c 74 68 69 73 | 75 73 65 72 5f 6c 69 6e |. lthis|user_lin|
|000013c0| 65 6c 65 6e 2c c2 0d 20 | 20 6c 74 68 69 73 75 73 |elen,.. | lthisus|
|000013d0| 65 72 5f 70 61 67 65 6c | 65 6e 2c c2 0d 20 20 6c |er_pagel|en,.. l|
|000013e0| 74 68 69 73 75 73 65 72 | 5f 64 65 66 61 75 6c 74 |thisuser|_default|
|000013f0| 73 2c c2 0d 20 20 6c 74 | 68 69 73 75 73 65 72 5f |s,.. lt|hisuser_|
|00001400| 6f 6e 74 6f 64 61 79 2c | c2 0d 20 20 6c 74 68 69 |ontoday,|.. lthi|
|00001410| 73 75 73 65 72 5f 69 6c | 6c 65 67 61 6c 2c c2 0d |suser_il|legal,..|
|00001420| 20 20 6c 74 68 69 73 75 | 73 65 72 5f 63 75 72 73 | lthisu|ser_curs|
|00001430| 6f 72 2c c2 0d 20 20 6c | 74 68 69 73 75 73 65 72 |or,.. l|thisuser|
|00001440| 5f 73 6c 2c c2 0d 20 20 | 6c 74 68 69 73 75 73 65 |_sl,.. |lthisuse|
|00001450| 72 5f 61 63 2c c2 0d 20 | 20 6c 74 68 69 73 75 73 |r_ac,.. | lthisus|
|00001460| 65 72 5f 61 72 2c c2 0d | 20 20 6c 74 68 69 73 75 |er_ar,..| lthisu|
|00001470| 73 65 72 5f 71 73 63 61 | 6e 5f 6c 74 72 2c c2 0d |ser_qsca|n_ltr,..|
|00001480| 20 20 6c 74 68 69 73 75 | 73 65 72 5f 71 73 63 61 | lthisu|ser_qsca|
|00001490| 6e 5f 6e 75 6d 62 65 72 | 2c c2 0d 20 20 6c 74 68 |n_number|,.. lth|
|000014a0| 69 73 75 73 65 72 5f 71 | 73 63 61 6e 5f 65 78 74 |isuser_q|scan_ext|
|000014b0| 2c c2 0d 20 20 6c 74 68 | 69 73 75 73 65 72 5f 71 |,.. lth|isuser_q|
|000014c0| 73 63 6e 2c c2 0d 20 20 | 6c 74 68 69 73 75 73 65 |scn,.. |lthisuse|
|000014d0| 72 5f 6d 61 63 72 6f 31 | 2c c2 0d 20 20 6c 74 68 |r_macro1|,.. lth|
|000014e0| 69 73 75 73 65 72 5f 6d | 61 63 72 6f 32 2c c2 0d |isuser_m|acro2,..|
|000014f0| 20 20 6c 74 68 69 73 75 | 73 65 72 5f 63 6f 6d 70 | lthisu|ser_comp|
|00001500| 74 79 70 65 2c c2 0d 20 | 20 6c 74 68 69 73 75 73 |type,.. | lthisus|
|00001510| 65 72 5f 6f 70 74 69 6f | 6e 2c c2 0d 20 20 6c 74 |er_optio|n,.. lt|
|00001520| 68 69 73 75 73 65 72 5f | 76 6f 74 65 2c c2 0d 20 |hisuser_|vote,.. |
|00001530| 20 6c 74 68 69 73 75 73 | 65 72 5f 73 62 6e 2c c2 | lthisus|er_sbn,.|
|00001540| 0d 20 20 6c 74 68 69 73 | 75 73 65 72 5f 64 73 6c |. lthis|user_dsl|
|00001550| 2c c2 0d 20 20 6c 74 68 | 69 73 75 73 65 72 5f 75 |,.. lth|isuser_u|
|00001560| 70 6c 6f 61 64 73 2c c2 | 0d 20 20 6c 74 68 69 73 |ploads,.|. lthis|
|00001570| 75 73 65 72 5f 64 6f 77 | 6e 6c 6f 61 64 73 2c c2 |user_dow|nloads,.|
|00001580| 0d 20 20 6c 74 68 69 73 | 75 73 65 72 5f 75 6b 2c |. lthis|user_uk,|
|00001590| c2 0d 20 20 6c 74 68 69 | 73 75 73 65 72 5f 64 6b |.. lthi|suser_dk|
|000015a0| 0d 20 20 0d 20 20 67 6c | 6f 62 61 6c 20 6c 72 65 |. . gl|obal lre|
|000015b0| 61 6c 73 6c 2c c2 0d 20 | 20 6c 74 69 6d 65 6f 6e |alsl,.. | ltimeon|
|000015c0| 2c c2 0d 20 20 6c 65 78 | 74 72 61 74 69 6d 65 2c |,.. lex|tratime,|
|000015d0| c2 0d 20 20 6c 74 74 69 | 6d 65 2c c2 0d 20 20 6c |.. ltti|me,.. l|
|000015e0| 63 68 61 74 74 69 6d 65 | 0d 20 20 0d 20 20 67 6c |chattime|. . gl|
|000015f0| 6f 62 61 6c 20 6c 73 79 | 73 74 61 74 5f 62 6f 61 |obal lsy|stat_boa|
|00001600| 72 64 70 77 2c c2 0d 20 | 20 6c 73 79 73 74 61 74 |rdpw,.. | lsystat|
|00001610| 5f 73 79 73 6f 70 70 77 | 2c c2 0d 20 20 6c 73 79 |_sysoppw|,.. lsy|
|00001620| 73 74 61 74 5f 68 6d 73 | 67 5f 6c 74 72 2c c2 0d |stat_hms|g_ltr,..|
|00001630| 20 20 6c 73 79 73 74 61 | 74 5f 68 6d 73 67 5f 6e | lsysta|t_hmsg_n|
|00001640| 75 6d 62 65 72 2c c2 0d | 20 20 6c 73 79 73 74 61 |umber,..| lsysta|
|00001650| 74 5f 68 6d 73 67 5f 65 | 78 74 2c c2 0d 20 20 6c |t_hmsg_e|xt,.. l|
|00001660| 73 79 73 74 61 74 5f 75 | 73 65 72 73 2c c2 0d 20 |systat_u|sers,.. |
|00001670| 20 6c 73 79 73 74 61 74 | 5f 6c 61 73 74 64 61 74 | lsystat|_lastdat|
|00001680| 65 2c c2 0d 20 20 6c 73 | 79 73 74 61 74 5f 63 61 |e,.. ls|ystat_ca|
|00001690| 6c 6c 65 72 6e 75 6d 2c | c2 0d 20 20 6c 73 79 73 |llernum,|.. lsys|
|000016a0| 74 61 74 5f 61 63 74 69 | 76 65 74 6f 64 61 79 2c |tat_acti|vetoday,|
|000016b0| c2 0d 20 20 6c 73 79 73 | 74 61 74 5f 63 61 6c 6c |.. lsys|tat_call|
|000016c0| 73 74 6f 64 61 79 2c c2 | 0d 20 20 6c 73 79 73 74 |stoday,.|. lsyst|
|000016d0| 61 74 5f 6d 73 67 70 6f | 73 74 74 6f 64 61 79 2c |at_msgpo|sttoday,|
|000016e0| c2 0d 20 20 6c 73 79 73 | 74 61 74 5f 65 6d 61 69 |.. lsys|tat_emai|
|000016f0| 6c 74 6f 64 61 79 2c c2 | 0d 20 20 6c 73 79 73 74 |ltoday,.|. lsyst|
|00001700| 61 74 5f 66 62 61 63 6b | 74 6f 64 61 79 2c c2 0d |at_fback|today,..|
|00001710| 20 20 6c 73 79 73 74 61 | 74 5f 75 70 74 6f 64 61 | lsysta|t_uptoda|
|00001720| 79 2c c2 0d 20 20 6c 73 | 79 73 74 61 74 5f 63 6c |y,.. ls|ystat_cl|
|00001730| 6f 73 65 64 73 79 73 74 | 65 6d 0d 20 20 0d 20 20 |osedsyst|em. . |
|00001740| 67 6c 6f 62 61 6c 20 6c | 73 79 73 6f 70 61 76 61 |global l|sysopava|
|00001750| 69 6c 2c c2 0d 20 20 6c | 65 78 74 72 61 6d 73 67 |il,.. l|extramsg|
|00001760| 73 2c c2 0d 20 20 6c 63 | 68 61 74 63 61 6c 6c 2c |s,.. lc|hatcall,|
|00001770| c2 0d 20 20 6c 63 68 61 | 74 72 2c c2 0d 20 20 6c |.. lcha|tr,.. l|
|00001780| 65 78 70 65 72 74 2c c2 | 0d 20 20 6c 66 74 6f 64 |expert,.|. lftod|
|00001790| 61 79 2c c2 0d 20 20 6c | 65 74 6f 64 61 79 2c c2 |ay,.. l|etoday,.|
|000017a0| 0d 20 20 6c 6d 72 65 61 | 64 2c c2 0d 20 20 6c 70 |. lmrea|d,.. lp|
|000017b0| 74 6f 64 61 79 0d 20 20 | 0d 20 20 67 6c 6f 62 61 |today. |. globa|
|000017c0| 6c 20 63 6f 6d 6e 75 6d | 2c 74 68 65 42 75 66 66 |l comnum|,theBuff|
|000017d0| 65 72 2c 69 6e 69 74 65 | 64 5f 62 75 66 66 65 72 |er,inite|d_buffer|
|000017e0| 2c 72 65 61 6c 63 6f 6d | 6e 75 6d 0d 20 20 0d 20 |,realcom|num. . |
|000017f0| 20 67 6c 6f 62 61 6c 20 | 62 62 73 70 61 74 68 0d | global |bbspath.|
|00001800| 20 20 0d 20 20 69 66 20 | 6c 73 70 64 20 3c 3e 20 | . if |lspd <> |
|00001810| 22 4b 42 22 20 74 68 65 | 6e 0d 20 20 20 20 73 65 |"KB" the|n. se|
|00001820| 6e 64 53 50 6f 72 74 20 | 63 6f 6d 6e 75 6d 2c 74 |ndSPort |comnum,t|
|00001830| 72 75 65 2c 65 6d 70 74 | 79 20 26 20 72 65 74 75 |rue,empt|y & retu|
|00001840| 72 6e 0d 20 20 20 20 73 | 65 6e 64 53 50 6f 72 74 |rn. s|endSPort|
|00001850| 20 63 6f 6d 6e 75 6d 2c | 74 72 75 65 2c 22 52 65 | comnum,|true,"Re|
|00001860| 74 75 72 6e 69 6e 67 20 | 74 6f 20 22 20 26 20 6c |turning |to " & l|
|00001870| 72 65 74 75 72 6e 70 72 | 6f 67 20 26 20 22 20 2e |returnpr|og & " .|
|00001880| 2e 2e 22 20 26 20 72 65 | 74 75 72 6e 0d 20 20 20 |.." & re|turn. |
|00001890| 20 69 66 20 69 6e 69 74 | 65 64 5f 62 75 66 66 65 | if init|ed_buffe|
|000018a0| 72 20 69 73 20 74 72 75 | 65 20 74 68 65 6e 0d 20 |r is tru|e then. |
|000018b0| 20 20 20 20 20 2d 2d 20 | 6f 6e 6c 79 20 6e 65 65 | -- |only nee|
|000018c0| 64 20 6e 65 78 74 20 6c | 69 6e 65 20 69 66 20 77 |d next l|ine if w|
|000018d0| 65 20 75 73 65 64 20 73 | 65 72 69 61 6c 20 70 6f |e used s|erial po|
|000018e0| 72 74 20 69 6e 70 75 74 | 20 62 75 66 66 65 72 0d |rt input| buffer.|
|000018f0| 20 20 20 20 20 20 2d 2d | 20 67 65 74 20 62 75 66 | --| get buf|
|00001900| 66 65 72 53 50 6f 72 74 | 28 63 6f 6d 6e 75 6d 2c |ferSPort|(comnum,|
|00001910| 74 68 65 42 75 66 66 65 | 72 2c 30 29 0d 20 20 20 |theBuffe|r,0). |
|00001920| 20 65 6e 64 20 69 66 0d | 20 20 65 6e 64 20 69 66 | end if.| end if|
|00001930| 0d 20 20 0d 20 20 70 75 | 74 20 72 65 61 6c 63 6f |. . pu|t realco|
|00001940| 6d 6e 75 6d 20 69 6e 74 | 6f 20 63 6f 6d 6e 75 6d |mnum int|o comnum|
|00001950| 20 2d 2d 20 72 65 73 74 | 6f 72 65 20 6f 75 72 20 | -- rest|ore our |
|00001960| 73 74 75 66 66 0d 20 20 | 0d 20 20 2d 2d 20 75 70 |stuff. |. -- up|
|00001970| 64 61 74 65 20 6c 61 75 | 6e 63 68 20 64 61 74 61 |date lau|nch data|
|00001980| 20 66 69 6c 65 20 28 69 | 66 20 6e 65 63 65 73 73 | file (i|f necess|
|00001990| 61 72 79 29 20 61 6e 64 | 20 72 65 74 75 72 6e 20 |ary) and| return |
|000019a0| 74 6f 20 42 42 53 0d 20 | 20 50 75 74 4c 61 75 6e |to BBS. | PutLaun|
|000019b0| 63 68 53 74 75 66 66 0d | 20 20 0d 20 20 69 66 20 |chStuff.| . if |
|000019c0| 6c 73 75 62 6c 61 75 6e | 63 68 20 74 68 65 6e 20 |lsublaun|ch then |
|000019d0| 2d 2d 20 77 61 73 20 73 | 75 62 2d 6c 61 75 6e 63 |-- was s|ub-launc|
|000019e0| 68 65 64 2c 20 6a 75 73 | 74 20 64 6f 20 45 78 69 |hed, jus|t do Exi|
|000019f0| 74 54 6f 53 68 65 6c 6c | 0d 20 20 20 20 64 6f 4d |tToShell|. doM|
|00001a00| 65 6e 75 20 22 51 75 69 | 74 20 48 79 70 65 72 43 |enu "Qui|t HyperC|
|00001a10| 61 72 64 22 0d 20 20 65 | 6c 73 65 0d 20 20 20 20 |ard". e|lse. |
|00001a20| 69 66 20 6c 72 65 74 75 | 72 6e 70 72 6f 67 20 69 |if lretu|rnprog i|
|00001a30| 73 20 6e 6f 74 20 65 6d | 70 74 79 20 74 68 65 6e |s not em|pty then|
|00001a40| 0d 20 20 20 20 20 20 69 | 66 20 6f 66 66 73 65 74 |. i|f offset|
|00001a50| 28 22 3a 22 2c 6c 72 65 | 74 75 72 6e 70 72 6f 67 |(":",lre|turnprog|
|00001a60| 29 20 3d 20 30 20 74 68 | 65 6e 0d 20 20 20 20 20 |) = 0 th|en. |
|00001a70| 20 20 20 2d 2d 20 68 61 | 76 65 20 74 6f 20 73 70 | -- ha|ve to sp|
|00001a80| 65 63 69 66 79 20 63 6f | 6d 70 6c 65 74 65 20 70 |ecify co|mplete p|
|00001a90| 61 74 68 0d 20 20 20 20 | 20 20 20 20 70 75 74 20 |ath. | put |
|00001aa0| 62 62 73 70 61 74 68 20 | 62 65 66 6f 72 65 20 6c |bbspath |before l|
|00001ab0| 72 65 74 75 72 6e 70 72 | 6f 67 0d 20 20 20 20 20 |returnpr|og. |
|00001ac0| 20 65 6e 64 20 69 66 0d | 20 20 20 20 20 20 6f 70 | end if.| op|
|00001ad0| 65 6e 20 6c 72 65 74 75 | 72 6e 70 72 6f 67 0d 20 |en lretu|rnprog. |
|00001ae0| 20 20 20 65 6e 64 20 69 | 66 0d 20 20 65 6e 64 20 | end i|f. end |
|00001af0| 69 66 0d 20 20 0d 65 6e | 64 20 47 6f 6f 64 42 79 |if. .en|d GoodBy|
|00001b00| 65 0d 0d 2d 2d 20 75 73 | 65 20 74 68 69 73 20 74 |e..-- us|e this t|
|00001b10| 6f 20 62 75 69 6c 64 20 | 74 68 65 20 73 74 61 63 |o build |the stac|
|00001b20| 6b 0d 2d 2d 20 6a 75 73 | 74 20 64 65 6c 65 74 65 |k.-- jus|t delete|
|00001b30| 20 61 6e 79 20 65 78 74 | 72 61 6e 65 6f 75 73 20 | any ext|raneous |
|00001b40| 63 61 72 64 73 2c 20 6d | 61 6b 65 20 73 75 72 65 |cards, m|ake sure|
|00001b50| 20 74 68 65 72 65 20 69 | 73 0d 2d 2d 20 6f 6e 65 | there i|s.-- one|
|00001b60| 20 63 61 72 64 20 77 69 | 74 68 20 61 20 62 61 63 | card wi|th a bac|
|00001b70| 6b 67 72 6f 75 6e 64 20 | 66 69 65 6c 64 20 66 6f |kground |field fo|
|00001b80| 72 20 74 68 65 20 63 61 | 72 64 20 6e 75 6d 62 65 |r the ca|rd numbe|
|00001b90| 72 0d 2d 2d 20 61 6e 64 | 20 61 20 63 61 72 64 20 |r.-- and| a card |
|00001ba0| 66 69 65 6c 64 20 66 6f | 72 20 74 68 65 20 61 63 |field fo|r the ac|
|00001bb0| 74 75 61 6c 20 71 75 6f | 74 65 2e 0d 2d 2d 20 70 |tual quo|te..-- p|
|00001bc0| 75 74 20 74 68 65 20 66 | 69 72 73 74 20 71 75 6f |ut the f|irst quo|
|00001bd0| 74 65 20 69 6e 74 6f 20 | 74 68 69 73 20 63 61 72 |te into |this car|
|00001be0| 64 0d 2d 2d 20 61 6e 64 | 20 6d 61 6b 65 20 69 74 |d.-- and| make it|
|00001bf0| 20 74 68 65 20 73 65 63 | 6f 6e 64 20 63 61 72 64 | the sec|ond card|
|00001c00| 20 6f 66 20 74 68 65 20 | 73 74 61 63 6b 0d 0d 6f | of the |stack..o|
|00001c10| 6e 20 62 75 69 6c 64 74 | 68 65 73 74 61 63 6b 0d |n buildt|hestack.|
|00001c20| 20 20 70 75 74 20 22 68 | 61 72 64 20 64 69 73 6b | put "h|ard disk|
|00001c30| 3a 62 62 73 3a 43 6f 6f | 6b 69 65 42 61 74 74 65 |:bbs:Coo|kieBatte|
|00001c40| 72 22 20 69 6e 74 6f 20 | 66 6e 61 6d 65 20 2d 2d |r" into |fname --|
|00001c50| 20 6e 61 6d 65 20 6f 66 | 20 66 69 6c 65 20 63 6f | name of| file co|
|00001c60| 6e 74 61 69 6e 69 6e 67 | 20 74 68 65 20 71 75 6f |ntaining| the quo|
|00001c70| 74 65 73 0d 20 20 6f 70 | 65 6e 20 66 69 6c 65 20 |tes. op|en file |
|00001c80| 66 6e 61 6d 65 0d 20 20 | 67 6f 20 74 6f 20 73 65 |fname. |go to se|
|00001c90| 63 6f 6e 64 20 63 61 72 | 64 0d 20 20 64 6f 4d 65 |cond car|d. doMe|
|00001ca0| 6e 75 20 22 43 6f 70 79 | 20 43 61 72 64 22 20 2d |nu "Copy| Card" -|
|00001cb0| 2d 20 74 68 65 20 74 65 | 6d 70 6c 61 74 65 0d 20 |- the te|mplate. |
|00001cc0| 20 2d 2d 20 73 6b 69 70 | 20 31 73 74 20 6f 6e 65 | -- skip| 1st one|
|00001cd0| 20 62 65 63 61 75 73 65 | 20 77 65 20 68 61 76 65 | because| we have|
|00001ce0| 20 64 6f 6e 65 20 69 74 | 20 6d 61 6e 75 61 6c 6c | done it| manuall|
|00001cf0| 79 0d 20 20 72 65 61 64 | 20 66 72 6f 6d 20 66 69 |y. read| from fi|
|00001d00| 6c 65 20 66 6e 61 6d 65 | 20 66 6f 72 20 31 20 2d |le fname| for 1 -|
|00001d10| 2d 20 73 6b 69 70 20 6c | 65 61 64 69 6e 67 20 40 |- skip l|eading @|
|00001d20| 0d 20 20 72 65 61 64 20 | 66 72 6f 6d 20 66 69 6c |. read |from fil|
|00001d30| 65 20 66 6e 61 6d 65 20 | 75 6e 74 69 6c 20 22 40 |e fname |until "@|
|00001d40| 22 0d 20 20 72 65 70 65 | 61 74 0d 20 20 20 20 64 |". repe|at. d|
|00001d50| 6f 4d 65 6e 75 20 22 50 | 61 73 74 65 20 43 61 72 |oMenu "P|aste Car|
|00001d60| 64 22 0d 20 20 20 20 67 | 65 74 20 74 68 65 20 6e |d". g|et the n|
|00001d70| 75 6d 62 65 72 20 6f 66 | 20 63 61 72 64 73 0d 20 |umber of| cards. |
|00001d80| 20 20 20 70 75 74 20 69 | 74 20 69 6e 74 6f 20 66 | put i|t into f|
|00001d90| 69 65 6c 64 20 31 0d 20 | 20 20 20 72 65 61 64 20 |ield 1. | read |
|00001da0| 66 72 6f 6d 20 66 69 6c | 65 20 66 6e 61 6d 65 20 |from fil|e fname |
|00001db0| 75 6e 74 69 6c 20 22 40 | 22 0d 20 20 20 20 69 66 |until "@|". if|
|00001dc0| 20 69 74 20 69 73 20 65 | 6d 70 74 79 20 74 68 65 | it is e|mpty the|
|00001dd0| 6e 20 2d 2d 20 65 6e 64 | 20 6f 66 20 66 69 6c 65 |n -- end| of file|
|00001de0| 0d 20 20 20 20 20 20 63 | 6c 6f 73 65 20 66 69 6c |. c|lose fil|
|00001df0| 65 20 66 6e 61 6d 65 0d | 20 20 20 20 20 20 65 78 |e fname.| ex|
|00001e00| 69 74 20 62 75 69 6c 64 | 74 68 65 73 74 61 63 6b |it build|thestack|
|00001e10| 0d 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 |. end| if. |
|00001e20| 70 75 74 20 65 6d 70 74 | 79 20 69 6e 74 6f 20 6c |put empt|y into l|
|00001e30| 61 73 74 20 63 68 61 72 | 20 6f 66 20 69 74 20 2d |ast char| of it -|
|00001e40| 2d 20 72 65 6d 6f 76 65 | 20 40 0d 20 20 20 20 70 |- remove| @. p|
|00001e50| 75 74 20 69 74 20 69 6e | 74 6f 20 63 61 72 64 20 |ut it in|to card |
|00001e60| 66 69 65 6c 64 20 31 20 | 2d 2d 20 74 68 65 20 71 |field 1 |-- the q|
|00001e70| 75 6f 74 65 0d 20 20 65 | 6e 64 20 72 65 70 65 61 |uote. e|nd repea|
|00001e80| 74 0d 65 6e 64 20 62 75 | 69 6c 64 74 68 65 73 74 |t.end bu|ildthest|
|00001e90| 61 63 6b 0d 00 00 00 00 | 00 00 00 00 00 00 00 00 |ack.....|........|
|00001ea0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001eb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f00| 00 00 01 00 00 00 01 78 | 00 00 00 78 00 00 00 e8 |.......x|...x....|
|00001f10| 60 f0 70 10 4e ad 01 e2 | 60 e8 4e 56 ff be 48 ee |`.p.N...|`.NV..H.|
|00001f20| 60 03 ff f0 20 6e ff f0 | 22 6e ff f0 2b 69 00 14 |`... n..|"n..+i..|
|00001f30| 0c 73 74 61 63 6b 20 73 | 63 72 69 70 74 73 02 00 |.stack s|cripts..|
|00001f40| 00 00 54 45 58 54 45 44 | 49 54 01 00 00 49 00 0a |..TEXTED|IT...I..|
|00001f50| 00 00 54 45 58 54 45 44 | 49 54 01 00 00 49 00 0a |..TEXTED|IT...I..|
|00001f60| 00 00 13 99 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f70| 00 00 9d f4 a0 95 00 00 | 1e 14 00 00 02 60 00 01 |........|.....`..|
|00001f80| 4e 5e 4e 75 42 00 60 f8 | 00 00 06 ca 04 98 00 03 |N^NuB.`.|........|
|00001f90| 42 67 4e ba 04 66 30 1f | 4e 75 2f 00 4e ba 03 6e |BgN..f0.|Nu/.N..n|
|00001fa0| 4e 75 42 27 2f 00 4e ba | 03 72 10 1f 4e 75 42 27 |NuB'/.N.|.r..NuB'|
|00001fb0| 2f 00 4e ba 03 74 10 1f | 4e 75 2f 00 2f 01 2f 02 |/.N..t..|Nu/././.|
|00001fc0| 2f 03 2f 04 4e ba 03 b6 | 4e 75 42 a7 2f 00 2f 01 |/./.N...|NuB././.|
|00001fd0| 2f 02 4e ba 03 00 20 5f | 4e 75 2f 00 2f 01 4e ba |/.N... _|Nu/./.N.|
|00001fe0| 03 10 4e 75 2f 00 4e ba | 03 16 4e 75 2f 00 4e ba |..Nu/.N.|..Nu/.N.|
|00001ff0| 02 f2 4e 75 4e 75 4e 56 | ff 8c 2d 4e ff fc 4e ba |..NuNuNV|..-N..N.|
|00002000| 00 00 00 0a 00 09 06 4d | 6f 6e 61 63 6f 00 00 00 |.......M|onaco...|
|00002010| 00 04 00 06 00 08 00 00 | 00 3f 03 00 80 00 00 00 |........|.?......|
|00002020| 03 33 2e 30 34 33 2e 30 | 2c 20 a9 20 57 61 79 6e |.3.043.0|, . Wayn|
|00002030| 65 20 42 65 6c 6c 2c 20 | 31 39 38 36 2c 20 4d 61 |e Bell, |1986, Ma|
|00002040| 63 20 76 65 72 73 69 6f | 6e 20 62 79 20 54 65 72 |c versio|n by Ter|
|00002050| 72 79 20 54 65 61 67 75 | 65 00 00 00 1b 03 00 80 |ry Teagu|e.......|
|00002060| 00 00 00 03 33 2e 30 10 | 57 57 49 56 20 4d 61 63 |....3.0.|WWIV Mac|
|00002070| 20 42 42 53 20 33 2e 30 | 00 00 01 00 00 00 01 78 | BBS 3.0|.......x|
|00002080| 00 00 00 78 00 00 00 e8 | 00 02 d6 58 06 fc 00 00 |...x....|...X....|
|00002090| 00 1c 00 66 00 02 45 46 | 4e 54 00 00 00 1a 45 54 |...f..EF|NT....ET|
|000020a0| 41 42 00 00 00 26 76 65 | 72 73 00 01 00 32 03 eb |AB...&ve|rs...2..|
|000020b0| 00 00 00 00 00 00 00 00 | 00 00 03 ec 00 41 00 00 |........|.....A..|
|000020c0| 00 0e 00 00 00 00 00 01 | ff ff 00 00 00 16 00 02 |........|........|
|000020d0| d6 50 00 02 ff ff 00 00 | 00 59 00 02 d6 8c 40 81 |.P......|.Y....@.|
|000020e0| 00 00 40 80 2a 14 00 1f | a6 74 00 1f a6 b2 00 1f |..@.*...|.t......|
|000020f0| a6 e6 00 1f a7 00 00 1f | a7 1a 00 1f a7 2e 40 80 |........|......@.|
|00002100| 21 06 00 1f a8 32 00 1f | ab da 00 1f a7 42 40 80 |!....2..|.....B@.|
|00002110| 21 0e 40 80 21 0e 40 80 | 21 0e 40 80 21 0e 40 40 |!.@.!.@.|!.@.!.@@|
|00002120| 81 00 00 40 80 2a 14 00 | 1f a6 74 00 1f a6 b2 00 |...@.*..|..t.....|
|00002130| 1f a6 e6 00 1f a7 00 00 | 1f a7 1a 00 1f a7 2e 40 |........|.......@|
|00002140| 80 21 06 00 1f a8 32 00 | 1f ab da 00 1f a7 42 40 |.!....2.|......B@|
|00002150| 80 21 0e 40 80 21 0e 40 | 80 21 0e 40 80 21 0e 40 |.!.@.!.@|.!.@.!.@|
|00002160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+